home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / NETSPLIT.ZIP / netsplit.txt
Text File  |  1996-11-27  |  468b  |  24 lines
  1.  
  2. ;goes in ALIAS
  3.  
  4. /onquit {
  5.   .timer750 1 30 /unset %split
  6.   .timer751 1 30 /unset %splitlist
  7.   if (($right(7,$parm1) == dal.net) && ($right(7,$parm2) == dal.net)) {
  8.     set %split2 $token(1,46,$parm2)
  9.     set %split $token(1,46,$parm1)
  10.     if %split !isin %splitlist {
  11.       set %splitlist %splitlist %split
  12.       amsg Netsplit:  $+ %split $+ / $+ %split2 $+   -=[┼cmú-ºcrφ■t]=-
  13.     }
  14.   }
  15. }
  16.  
  17.  
  18. ;goes in EVENTS
  19.  
  20. !1:ON QUIT:/onquit
  21.  
  22.  
  23. Thanks,
  24. Fugi